From fd30859b2b4a644e5e3830401776c17dc5e4a156 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 3 Jun 2013 11:28:10 -0400 Subject: [PATCH] * lisp/emacs-lisp/lisp-mode.el (eval-sexp-add-defvars): Expand macros eagerly. --- lisp/ChangeLog | 5 +++++ lisp/emacs-lisp/lisp-mode.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 537cbd69b28..add4b6d9728 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-06-03 Stefan Monnier + + * emacs-lisp/lisp-mode.el (eval-sexp-add-defvars): Expand macros + eagerly (bug#14422). + 2013-06-03 Michael Albinus * autorevert.el (auto-revert-notify-enabled) diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index ae855052524..02b020fa241 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -809,6 +809,7 @@ With argument, print output into current buffer." (defun eval-sexp-add-defvars (exp &optional pos) "Prepend EXP with all the `defvar's that precede it in the buffer. POS specifies the starting position where EXP was found and defaults to point." + (setq exp (macroexpand-all exp)) ;Eager macro-expansion. (if (not lexical-binding) exp (save-excursion -- 2.30.2